object OptionsForm: TOptionsForm Left = 244 Top = 111 BorderStyle = bsToolWindow Caption = 'Options' ClientHeight = 226 ClientWidth = 286 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object LabelCDROM: TLabel Left = 7 Top = 154 Width = 117 Height = 13 Caption = 'Set CD-ROM drive letter:' end object LabelPixelDistance: TLabel Left = 7 Top = 96 Width = 244 Height = 13 Caption = 'Set distance in pixels for single-click track selection:' end object CheckBoxContinuousPlay: TCheckBox Left = 7 Top = 9 Width = 100 Height = 17 Caption = 'Continuous Play' TabOrder = 0 end object ButtonOK: TButton Left = 35 Top = 192 Width = 93 Height = 26 Caption = 'OK' TabOrder = 1 OnClick = ButtonOKClick end object ButtonCancel: TButton Left = 162 Top = 192 Width = 90 Height = 27 Cancel = True Caption = 'Cancel' TabOrder = 2 OnClick = ButtonCancelClick end object CheckBoxPlayOnStart: TCheckBox Left = 7 Top = 38 Width = 83 Height = 17 Caption = 'Play on start' TabOrder = 3 end object CheckBoxPlayOnClose: TCheckBox Left = 7 Top = 67 Width = 134 Height = 17 Caption = 'Play on close of cd tray' TabOrder = 4 end object DriveComboBox: TDriveComboBox Left = 127 Top = 154 Width = 125 Height = 21 TabOrder = 5 end object TrackBarPixelDistance: TTrackBar Left = 7 Top = 120 Width = 157 Height = 17 Max = 16 Min = 1 Orientation = trHorizontal Frequency = 1 Position = 1 SelEnd = 0 SelStart = 0 TabOrder = 6 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TrackBarPixelDistanceChange end object EditPixelDistance: TEdit Left = 170 Top = 120 Width = 25 Height = 21 ReadOnly = True TabOrder = 7 end object Panel1: TPanel Left = 212 Top = 9 Width = 40 Height = 40 BevelInner = bvRaised BevelOuter = bvNone TabOrder = 8 object ImageIcon: TImage Left = 4 Top = 4 Width = 32 Height = 32 Hint = 'HandyCd'#13'� 1996-97 Lester is slank! producties' ParentShowHint = False ShowHint = True end end object MSOfficeCaption: TMSOfficeCaption AppNameText.Caption = 'HandyCd -' AppNameText.FontKind = fkSystemB AppNameText.Visible = True CaptionText.Caption = 'Options' CaptionText.FontKind = fkSystem CaptionText.Visible = True CompanyText.Caption = 'Lester is slank! producties' CompanyText.FontKind = fkSystemBI CompanyText.Visible = True Enabled = geWhenActive NumColors = 256 Left = 209 Top = 49 end end